object FrmOrderProblem: TFrmOrderProblem
  Left = 0
  Top = 0
  Caption = #38382#39064#20214#31649#29702
  ClientHeight = 597
  ClientWidth = 1193
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #24494#36719#38597#40657
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 17
  object cxGroupBox1: TcxGroupBox
    Left = 0
    Top = 0
    Align = alTop
    PanelStyle.Active = True
    TabOrder = 0
    Height = 71
    Width = 1193
    object Label1: TLabel
      Left = 455
      Top = 42
      Width = 72
      Height = 17
      Caption = #38382#39064#20214#27969#27700#21495
    end
    object Label2: TLabel
      Left = 12
      Top = 11
      Width = 48
      Height = 17
      Caption = #36215#22987#26102#38388
    end
    object Label3: TLabel
      Left = 12
      Top = 42
      Width = 48
      Height = 17
      Caption = #32467#26463#26102#38388
    end
    object Label4: TLabel
      Left = 455
      Top = 11
      Width = 48
      Height = 17
      Caption = #22788#29702#29366#24577
    end
    object Label8: TLabel
      Left = 241
      Top = 11
      Width = 48
      Height = 17
      Caption = #38382#39064#31867#22411
    end
    object Label9: TLabel
      Left = 241
      Top = 42
      Width = 48
      Height = 17
      Caption = #32467#26463#31867#22411
    end
    object Label12: TLabel
      Left = 683
      Top = 11
      Width = 48
      Height = 17
      Caption = #36816#21333#32534#21495
    end
    object edtProblemNo: TcxTextEdit
      Left = 533
      Top = 39
      TabOrder = 0
      Width = 136
    end
    object edtDateFrom: TcxDateEdit
      Left = 69
      Top = 8
      Properties.Kind = ckDateTime
      TabOrder = 1
      Width = 148
    end
    object edtDateTo: TcxDateEdit
      Left = 69
      Top = 39
      Properties.Kind = ckDateTime
      TabOrder = 2
      Width = 147
    end
    object cmbStatus: TcxImageComboBox
      Left = 533
      Top = 8
      EditValue = -1
      Properties.Items = <
        item
          Description = #20840#37096
          ImageIndex = 0
          Value = -1
        end
        item
          Description = #22788#29702#20013
          Value = 1
        end
        item
          Description = #24050#23436#25104
          Value = 2
        end>
      TabOrder = 3
      Width = 136
    end
    object cmbProblemType: TcxLookupComboBox
      Left = 302
      Top = 8
      Properties.ClearKey = 46
      Properties.KeyFieldNames = 'DVALUE'
      Properties.ListColumns = <
        item
          FieldName = 'PARAMCAP'
        end>
      Properties.ListOptions.ShowHeader = False
      Properties.ListSource = dsProblemType
      TabOrder = 4
      OnKeyDown = cmbProblemTypeKeyDown
      Width = 136
    end
    object cxButton2: TcxButton
      Left = 899
      Top = 8
      Width = 81
      Height = 36
      Action = actSearch
      TabOrder = 5
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ParentFont = False
    end
    object cmbCloseType: TcxLookupComboBox
      Left = 302
      Top = 39
      Properties.ClearKey = 46
      Properties.KeyFieldNames = 'DVALUE'
      Properties.ListColumns = <
        item
          FieldName = 'PARAMCAP'
        end>
      Properties.ListOptions.ShowHeader = False
      Properties.ListSource = dsProCloseType
      TabOrder = 6
      OnKeyDown = cmbProblemTypeKeyDown
      Width = 136
    end
    object edtBillNo: TcxTextEdit
      Left = 744
      Top = 8
      TabOrder = 7
      Width = 136
    end
  end
  object cxGroupBox3: TcxGroupBox
    Left = 0
    Top = 71
    Align = alTop
    Style.Edges = [bLeft, bRight, bBottom]
    TabOrder = 1
    Height = 46
    Width = 1193
    object btnNew: TcxButton
      Left = 6
      Top = 5
      Width = 85
      Height = 36
      Action = actNew
      TabOrder = 0
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ParentFont = False
    end
    object btnEdit: TcxButton
      Left = 93
      Top = 5
      Width = 85
      Height = 36
      Action = actEdit
      TabOrder = 1
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ParentFont = False
    end
    object btnDelete: TcxButton
      Left = 752
      Top = 5
      Width = 85
      Height = 36
      Action = actDelete
      Colors.Default = clSilver
      TabOrder = 2
      Visible = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ParentFont = False
    end
    object btnComplete: TcxButton
      Left = 180
      Top = 5
      Width = 85
      Height = 36
      Action = actComplete
      TabOrder = 3
    end
    object btnSettled: TcxButton
      Left = 267
      Top = 5
      Width = 85
      Height = 36
      Action = actSettled
      TabOrder = 4
      Visible = False
    end
    object btnDefiPublish: TcxButton
      Left = 354
      Top = 5
      Width = 93
      Height = 36
      Action = actDefiPublish
      TabOrder = 5
      Visible = False
    end
    object btnComple: TcxButton
      Left = 449
      Top = 5
      Width = 93
      Height = 36
      Action = actDefiComplete
      TabOrder = 6
      Visible = False
    end
  end
  object GrdProblem: TcxGrid
    Left = 0
    Top = 117
    Width = 592
    Height = 480
    Align = alClient
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #24494#36719#38597#40657
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    ExplicitHeight = 321
    object tvProblem: TcxGridDBTableView
      PopupMenu = pmExport
      Navigator.Buttons.CustomButtons = <>
      OnCustomDrawCell = tvProblemCustomDrawCell
      DataController.DataSource = dsProblem
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsCustomize.ColumnsQuickCustomization = True
      OptionsData.CancelOnExit = False
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Inserting = False
      OptionsView.NoDataToDisplayInfoText = '<'#27809#26377#25968#25454'>'
      OptionsView.ShowEditButtons = gsebAlways
      OptionsView.CellAutoHeight = True
      OptionsView.GroupByBox = False
      OptionsView.Indicator = True
      OptionsView.IndicatorWidth = 30
      object tvProblemPROBLEM_NO: TcxGridDBColumn
        DataBinding.FieldName = 'PROBLEM_NO'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 182
      end
      object tvProblemBILL_NO: TcxGridDBColumn
        DataBinding.FieldName = 'BILL_NO'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 125
      end
      object tvProblemPROBLEM_TYPE: TcxGridDBColumn
        Caption = #38382#39064#21457#36215#31867#22411
        DataBinding.FieldName = 'PROBLEM_TYPE'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 99
      end
      object tvProblemPROBLEM_FOLLOW: TcxGridDBColumn
        DataBinding.FieldName = 'PROBLEM_FOLLOW'
        PropertiesClassName = 'TcxMemoProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 200
      end
      object tvProblemSTATUS: TcxGridDBColumn
        DataBinding.FieldName = 'STATUS'
        RepositoryItem = FrmConsole.EditRepProblemStatus
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Options.ShowEditButtons = isebNever
        Width = 78
      end
      object tvProblemPROBLEM_THEME: TcxGridDBColumn
        DataBinding.FieldName = 'PROBLEM_THEME'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 165
      end
      object tvProblemSOURCE_STATUS: TcxGridDBColumn
        DataBinding.FieldName = 'SOURCE_STATUS'
        RepositoryItem = FrmConsole.EditProblemSourceStatus
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Options.ShowEditButtons = isebNever
      end
      object tvProblemCLOSE_TYPE: TcxGridDBColumn
        DataBinding.FieldName = 'CLOSE_TYPE'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Options.ShowEditButtons = isebNever
        Width = 80
      end
      object tvProblemERROR_DESC: TcxGridDBColumn
        DataBinding.FieldName = 'ERROR_DESC'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 127
      end
      object tvProblemRESPON_LEVEL: TcxGridDBColumn
        DataBinding.FieldName = 'RESPON_LEVEL'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 106
      end
      object tvProblemPROBLEM_DESC: TcxGridDBColumn
        DataBinding.FieldName = 'PROBLEM_DESC'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 200
      end
      object tvProblemCRT_DATE: TcxGridDBColumn
        DataBinding.FieldName = 'CRT_DATE'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 159
      end
      object tvProblemFETCH_NODE: TcxGridDBColumn
        Caption = #25910#20214#32593#28857
        DataBinding.FieldName = 'FETCH_NODE'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 112
      end
      object tvProblemDISP_NODE: TcxGridDBColumn
        Caption = #27966#20214#32593#28857
        DataBinding.FieldName = 'DISP_NODE'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 109
      end
      object tvProblemDUTY_NODE: TcxGridDBColumn
        DataBinding.FieldName = 'DUTY_NODE'
        HeaderAlignmentHorz = taCenter
        Width = 118
      end
      object tvProblemREMARK: TcxGridDBColumn
        DataBinding.FieldName = 'REMARK'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 182
      end
      object tvProblemCREATE_BY: TcxGridDBColumn
        DataBinding.FieldName = 'CREATE_BY'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 114
      end
      object tvProblemNODE_NO: TcxGridDBColumn
        Caption = #30331#35760#32593#28857
        DataBinding.FieldName = 'NODE_NO'
        PropertiesClassName = 'TcxTextEditProperties'
        Properties.ReadOnly = True
        HeaderAlignmentHorz = taCenter
        Width = 104
      end
      object tvProblemUPDATE_DT: TcxGridDBColumn
        DataBinding.FieldName = 'UPDATE_DT'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Width = 133
      end
      object tvProblemColumn1: TcxGridDBColumn
        DataBinding.FieldName = 'IsReply'
        Visible = False
      end
    end
    object lvEXP_COMP: TcxGridLevel
      GridView = tvProblem
    end
  end
  object Panel1: TPanel
    Left = 592
    Top = 117
    Width = 601
    Height = 480
    Align = alRight
    Alignment = taRightJustify
    BevelOuter = bvNone
    TabOrder = 3
    ExplicitHeight = 321
    object Panel2: TPanel
      Left = 0
      Top = 0
      Width = 601
      Height = 351
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      ExplicitHeight = 192
      object GrdProcess: TcxGrid
        Left = 0
        Top = 43
        Width = 601
        Height = 308
        Align = alClient
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #24494#36719#38597#40657
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        ExplicitHeight = 149
        object tvProcess: TcxGridDBTableView
          Navigator.Buttons.CustomButtons = <>
          DataController.DataSource = dsProcess
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          OptionsCustomize.ColumnsQuickCustomization = True
          OptionsData.CancelOnExit = False
          OptionsData.Deleting = False
          OptionsData.DeletingConfirmation = False
          OptionsData.Inserting = False
          OptionsView.NoDataToDisplayInfoText = '<'#27809#26377#25968#25454'>'
          OptionsView.CellAutoHeight = True
          OptionsView.GroupByBox = False
          OptionsView.Indicator = True
          OptionsView.IndicatorWidth = 30
          object tvProcessColumn1: TcxGridDBColumn
            Caption = #36319#36827#32593#28857
            DataBinding.FieldName = 'ACCEPT_NODE'
            HeaderAlignmentHorz = taCenter
            Options.Editing = False
            Width = 80
          end
          object tvProcessPROCESS_DESC: TcxGridDBColumn
            Caption = #22788#29702#20869#23481
            DataBinding.FieldName = 'PROCESS_DESC'
            PropertiesClassName = 'TcxMemoProperties'
            Properties.ReadOnly = True
            HeaderAlignmentHorz = taCenter
            Width = 246
          end
          object tvProcessPROCESS_NO: TcxGridDBColumn
            Caption = #24037#21495
            DataBinding.FieldName = 'PROCESS_NO'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.ReadOnly = True
            HeaderAlignmentHorz = taCenter
            Width = 103
          end
          object tvProcessPROCESS_NAME: TcxGridDBColumn
            Caption = #25805#20316#21592
            DataBinding.FieldName = 'PROCESS_NAME'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.ReadOnly = True
            HeaderAlignmentHorz = taCenter
            Width = 97
          end
          object tvProcessUPDATE_DT: TcxGridDBColumn
            Caption = #25805#20316#26085#26399
            DataBinding.FieldName = 'CREATE_DT'
            HeaderAlignmentHorz = taCenter
            Options.Editing = False
            Width = 150
          end
        end
        object cxGridLevel1: TcxGridLevel
          GridView = tvProcess
        end
      end
      object cxGroupBox4: TcxGroupBox
        Left = 0
        Top = 0
        Align = alTop
        TabOrder = 1
        Height = 43
        Width = 601
        object cxButton1: TcxButton
          Left = 3
          Top = 3
          Width = 102
          Height = 36
          Action = actProcess
          TabOrder = 0
        end
      end
    end
    object cxGroupBox5: TcxGroupBox
      Left = 0
      Top = 351
      Align = alBottom
      Caption = #38382#39064#20214#22238#22797
      Style.Edges = [bTop, bBottom]
      TabOrder = 1
      Visible = False
      ExplicitTop = 192
      Height = 129
      Width = 601
      object Panel3: TPanel
        Left = 1
        Top = 19
        Width = 599
        Height = 27
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        object Label5: TLabel
          Left = 14
          Top = 5
          Width = 48
          Height = 17
          Caption = #22238#22797#26102#38388
        end
        object Label6: TLabel
          Left = 255
          Top = 5
          Width = 60
          Height = 17
          Caption = #22238#22797#20154#32534#21495
        end
        object Label7: TLabel
          Left = 428
          Top = 5
          Width = 60
          Height = 17
          Caption = #22238#22797#20154#21517#31216
        end
        object cxDBTextEdit1: TcxDBTextEdit
          Left = 72
          Top = 3
          DataBinding.DataField = 'REPLY_TIME'
          DataBinding.DataSource = dsProcess
          Properties.ReadOnly = True
          TabOrder = 0
          Width = 162
        end
        object cxDBTextEdit2: TcxDBTextEdit
          Left = 324
          Top = 3
          DataBinding.DataField = 'REPLY_NO'
          DataBinding.DataSource = dsProcess
          Properties.ReadOnly = True
          TabOrder = 1
          Width = 98
        end
        object cxDBTextEdit3: TcxDBTextEdit
          Left = 496
          Top = 3
          DataBinding.DataField = 'REPLY_NAME'
          DataBinding.DataSource = dsProcess
          Properties.ReadOnly = True
          TabOrder = 2
          Width = 98
        end
      end
      object cxDBMemo1: TcxDBMemo
        Left = 1
        Top = 46
        Align = alClient
        DataBinding.DataField = 'REPLY_DESC'
        DataBinding.DataSource = dsProcess
        Properties.ReadOnly = True
        Properties.ScrollBars = ssBoth
        TabOrder = 1
        Height = 73
        Width = 599
      end
    end
  end
  object ActionList: TActionList
    Images = FrmConsole.img32
    Left = 112
    Top = 208
    object actNew: TAction
      Caption = #26032#24314
      ImageIndex = 139
      OnExecute = actNewExecute
    end
    object actEdit: TAction
      Tag = 1
      Caption = #32534#36753
      Enabled = False
      ImageIndex = 163
      OnExecute = actEditExecute
    end
    object actClear: TAction
      Tag = 3
      Caption = #28165#31354
      ImageIndex = 45
    end
    object actDelete: TAction
      Tag = 4
      Caption = #21024#38500
      ImageIndex = 75
      OnExecute = actDeleteExecute
    end
    object actSearch: TAction
      Caption = #26597#35810
      ImageIndex = 152
      OnExecute = actSearchExecute
    end
    object actComplete: TAction
      Caption = #23436#25104
      ImageIndex = 145
      OnExecute = actCompleteExecute
    end
    object actDefinition: TAction
      Caption = #38382#39064#30028#23450
      ImageIndex = 205
      OnExecute = actDefinitionExecute
    end
    object actProcess: TAction
      Caption = #38382#39064#36319#36827
      ImageIndex = 191
      OnExecute = actProcessExecute
    end
    object actSettled: TAction
      Caption = #29702#36180
      ImageIndex = 37
      OnExecute = actSettledExecute
    end
    object actDefiPublish: TAction
      Caption = #30028#23450#21457#24067
      ImageIndex = 100
      OnExecute = actDefiPublishExecute
    end
    object actDefiComplete: TAction
      Caption = #30028#23450#23436#25104
      ImageIndex = 145
      OnExecute = actDefiCompleteExecute
    end
  end
  object crsProblem: TClientRowSet
    Aggregates = <>
    BeforePost = crsProblemBeforePost
    OnCalcFields = crsProblemCalcFields
    OnNewRecord = crsProblemNewRecord
    AppServer = Dm.AppServer
    TableName = 'TSP_ORDER_PROBLEM  '
    Left = 480
    Top = 208
    object crsProblemID: TStringField
      FieldName = 'ID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Size = 50
    end
    object crsProblemPROBLEM_NO: TStringField
      DisplayLabel = #38382#39064#20214#27969#27700#21495
      FieldName = 'PROBLEM_NO'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemSYS_ACCOUNT: TStringField
      FieldName = 'SYS_ACCOUNT'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemGROUP_CODE: TStringField
      FieldName = 'GROUP_CODE'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemBILL_NO: TStringField
      DisplayLabel = #36816#21333#32534#21495
      FieldName = 'BILL_NO'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemPROBLEM_TYPE: TStringField
      DisplayLabel = #38382#39064#31867#22411
      FieldName = 'PROBLEM_TYPE'
      ProviderFlags = [pfInUpdate]
      Size = 100
    end
    object crsProblemPROBLEM_FOLLOW: TStringField
      DisplayLabel = #38382#39064#20214#21407#22240
      FieldName = 'PROBLEM_FOLLOW'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsProblemCRT_DATE: TStringField
      DisplayLabel = #23492#20214#26085#26399
      FieldName = 'CRT_DATE'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemFETCH_NODE: TStringField
      DisplayLabel = #25910#20214#31449#28857
      FieldName = 'FETCH_NODE'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemSEND_NAME: TStringField
      DisplayLabel = #23492#20214#23458#25143
      FieldName = 'SEND_NAME'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemSEND_CONT: TStringField
      DisplayLabel = #23492#20214#20154
      FieldName = 'SEND_CONT'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemSEND_TEL: TStringField
      DisplayLabel = #23492#20214#30005#35805
      FieldName = 'SEND_TEL'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemSEND_ADDR: TStringField
      DisplayLabel = #23492#20214#22320#22336
      FieldName = 'SEND_ADDR'
      ProviderFlags = [pfInUpdate]
      Size = 200
    end
    object crsProblemDISP_NODE: TStringField
      DisplayLabel = #27966#20214#31449#28857
      FieldName = 'DISP_NODE'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemDEST_NAME: TStringField
      DisplayLabel = #25910#36135#23458#25143
      FieldName = 'DEST_NAME'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemDEST_CONT: TStringField
      DisplayLabel = #25910#36135#20154
      FieldName = 'DEST_CONT'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemDEST_TEL: TStringField
      DisplayLabel = #25910#36135#20154#30005#35805
      FieldName = 'DEST_TEL'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemDEST_ADDR: TStringField
      DisplayLabel = #25910#36135#22320#22336
      FieldName = 'DEST_ADDR'
      ProviderFlags = [pfInUpdate]
      Size = 200
    end
    object crsProblemVERSION: TIntegerField
      FieldName = 'VERSION'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemSTATUS: TSmallintField
      DisplayLabel = #29366#24577
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemDISABLED: TSmallintField
      DisplayLabel = #26159#21542#29983#25928
      FieldName = 'DISABLED'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemREMARK: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'REMARK'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsProblemCREATE_DT: TStringField
      FieldName = 'CREATE_DT'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemUPDATE_DT: TStringField
      DisplayLabel = #26356#26032#26102#38388
      FieldName = 'UPDATE_DT'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemPROBLEM_THEME: TStringField
      DisplayLabel = #38382#39064#20027#39064
      FieldName = 'PROBLEM_THEME'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsProblemCREATE_BY: TStringField
      DisplayLabel = #30331#35760#20154
      FieldName = 'CREATE_BY'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemPROBLEM_DESC: TStringField
      DisplayLabel = #38382#39064#25551#36848
      FieldName = 'PROBLEM_DESC'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsProblemNODE_NO: TStringField
      Tag = 100
      DisplayLabel = #30331#35760#31449#28857
      FieldName = 'NODE_NO'
      LookupCache = True
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemNEED_SETTLED: TIntegerField
      DisplayLabel = #38656#35201#29702#36180
      FieldName = 'NEED_SETTLED'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemSETTLED_STATUS: TIntegerField
      DisplayLabel = #29702#36180#29366#24577
      FieldName = 'SETTLED_STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemSETTLED_AMOUNT: TFloatField
      DisplayLabel = #29702#36180#37329#39069
      FieldName = 'SETTLED_AMOUNT'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemSETTLED_DT: TStringField
      DisplayLabel = #29702#36180#26102#38388
      FieldName = 'SETTLED_DT'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemSETTLED_REMARK: TStringField
      DisplayLabel = #29702#36180#22791#27880
      FieldName = 'SETTLED_REMARK'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsProblemDEFI_PUBLISH_STATUS: TIntegerField
      DisplayLabel = #30028#23450#21457#24067#29366#24577
      FieldName = 'DEFI_PUBLISH_STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemSETTLED_NODE: TStringField
      FieldName = 'SETTLED_NODE'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemCLOSE_TYPE: TStringField
      DisplayLabel = #32467#26463#31867#22411
      FieldName = 'CLOSE_TYPE'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemSOURCE_STATUS: TIntegerField
      DisplayLabel = #25237#35785#26469#28304
      FieldName = 'SOURCE_STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemERROR_DESC: TStringField
      DisplayLabel = #25805#20316#22833#35823#20869#23481
      FieldName = 'ERROR_DESC'
      ProviderFlags = [pfInUpdate]
      Size = 200
    end
    object crsProblemRESPON_LEVEL: TStringField
      DisplayLabel = #36131#20219#32423#21035
      FieldName = 'RESPON_LEVEL'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemDUTY_NODE: TStringField
      DisplayLabel = #36131#20219#26041
      FieldName = 'DUTY_NODE'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsProblemCOMPANY_AMOUNT: TFloatField
      FieldName = 'COMPANY_AMOUNT'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemPERSON_AMOUNT: TFloatField
      FieldName = 'PERSON_AMOUNT'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemEMP_NO: TStringField
      FieldName = 'EMP_NO'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemEMP_NAME: TStringField
      FieldName = 'EMP_NAME'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemCARGO: TStringField
      FieldName = 'CARGO'
      ProviderFlags = [pfInUpdate]
      Size = 200
    end
    object crsProblemIsReply: TIntegerField
      FieldKind = fkCalculated
      FieldName = 'IsReply'
      ProviderFlags = []
      Calculated = True
    end
    object crsProblemFETCH_EMPNO: TStringField
      FieldName = 'FETCH_EMPNO'
      ProviderFlags = [pfInUpdate]
    end
    object crsProblemFETCH_EMPNAME: TStringField
      FieldName = 'FETCH_EMPNAME'
      ProviderFlags = [pfInUpdate]
    end
  end
  object dsProblem: TDataSource
    DataSet = crsProblem
    Left = 544
    Top = 208
  end
  object dsProblemType: TDataSource
    DataSet = Dm.crsProblemType
    Left = 144
    Top = 272
  end
  object pmExport: TPopupMenu
    AutoHotkeys = maManual
    Left = 296
    Top = 200
    object MenuItem1: TMenuItem
      Caption = #23548#20986
      OnClick = MenuItem1Click
    end
  end
  object svdlg: TSaveDialog
    DefaultExt = '*.xls'
    Filter = 'xls|*.xls|xlsx|*.xlsx|text|.txt|html|*.htm|xml|*.xml'
    Left = 369
    Top = 261
  end
  object crsProcess: TClientRowSet
    Aggregates = <>
    CommandText = 'select  *  from v_problem_process_list '
    IndexFieldNames = 'PROBLEM_ID'
    MasterFields = 'ID'
    MasterSource = dsProblem
    PacketRecords = 0
    AppServer = Dm.AppServer
    TableName = 'tsp_order_problem_process'
    Left = 48
    Top = 264
    object crsProcessID: TStringField
      FieldName = 'ID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Size = 50
    end
    object crsProcessPROBLEM_ID: TStringField
      FieldName = 'PROBLEM_ID'
      ProviderFlags = [pfInWhere]
      Size = 50
    end
    object crsProcessPROCESS_DESC: TStringField
      FieldName = 'PROCESS_DESC'
      ProviderFlags = [pfInWhere]
      Size = 500
    end
    object crsProcessNODE_NO: TStringField
      FieldName = 'NODE_NO'
      ProviderFlags = [pfInWhere]
      Size = 50
    end
    object crsProcessPROCESS_NAME: TStringField
      FieldName = 'PROCESS_NAME'
      ProviderFlags = [pfInWhere]
      Size = 50
    end
    object crsProcessCREATE_DT: TStringField
      FieldName = 'CREATE_DT'
      ProviderFlags = [pfInWhere]
    end
    object crsProcessACCEPT_NODE: TStringField
      FieldName = 'ACCEPT_NODE'
      ProviderFlags = [pfInWhere]
      Size = 50
    end
    object crsProcessPROCESS_NO: TStringField
      FieldName = 'PROCESS_NO'
      ProviderFlags = [pfInWhere]
      Size = 50
    end
    object crsProcessGROUP_CODE: TStringField
      FieldName = 'GROUP_CODE'
      ProviderFlags = [pfInWhere]
      Size = 50
    end
  end
  object dsProcess: TDataSource
    DataSet = crsProcess
    Left = 40
    Top = 320
  end
  object dsProCloseType: TDataSource
    DataSet = Dm.crsProCloseType
    Left = 448
    Top = 264
  end
  object crsFeed: TClientRowSet
    Aggregates = <>
    IndexFieldNames = 'PROBLEM_ID'
    MasterFields = 'ID'
    MasterSource = dsProblem
    PacketRecords = 0
    AppServer = Dm.AppServer
    TableName = 'TSP_ORDER_PROBLEM_DEFI'
    Left = 144
    Top = 344
    object crsFeedID: TStringField
      FieldName = 'ID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Size = 50
    end
    object crsFeedPROBLEM_ID: TStringField
      FieldName = 'PROBLEM_ID'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsFeedSYS_ACCOUNT: TStringField
      FieldName = 'SYS_ACCOUNT'
      ProviderFlags = [pfInUpdate]
    end
    object crsFeedGROUP_CODE: TStringField
      FieldName = 'GROUP_CODE'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsFeedFEEBACK_NODE_NO: TStringField
      DisplayLabel = #36131#20219#32593#28857#32534#21495
      FieldName = 'FEEBACK_NODE_NO'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsFeedFEEBACK_DESC: TStringField
      DisplayLabel = #30028#23450#20869#23481
      FieldName = 'FEEBACK_DESC'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsFeedREPLY_NO: TStringField
      DisplayLabel = #21453#39304#20154#32534#21495
      FieldName = 'REPLY_NO'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsFeedREPLY_NAME: TStringField
      DisplayLabel = #21453#39304#20154
      FieldName = 'REPLY_NAME'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object crsFeedREPLY_DESC: TStringField
      DisplayLabel = #21453#39304#20869#23481
      FieldName = 'REPLY_DESC'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsFeedVERSION: TIntegerField
      FieldName = 'VERSION'
    end
    object crsFeedSTATUS: TSmallintField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object crsFeedDISABLED: TSmallintField
      FieldName = 'DISABLED'
      ProviderFlags = [pfInUpdate]
    end
    object crsFeedREMARK: TStringField
      FieldName = 'REMARK'
      ProviderFlags = [pfInUpdate]
      Size = 500
    end
    object crsFeedCREATE_DT: TStringField
      FieldName = 'CREATE_DT'
      ProviderFlags = [pfInUpdate]
    end
    object crsFeedUPDATE_DT: TStringField
      DisplayLabel = #26356#26032#26102#38388
      FieldName = 'UPDATE_DT'
      ProviderFlags = [pfInUpdate]
    end
    object crsFeedREPLY_DT: TStringField
      DisplayLabel = #21453#39304#26102#38388
      FieldName = 'REPLY_DT'
      ProviderFlags = [pfInUpdate]
    end
  end
  object dsFeed: TDataSource
    DataSet = crsFeed
    Left = 200
    Top = 352
  end
  object pmDefi: TPopupMenu
    AutoHotkeys = maManual
    Left = 248
    Top = 296
    object N1: TMenuItem
      Action = actDefinition
    end
    object N2: TMenuItem
      Action = actDefiPublish
    end
    object N3: TMenuItem
      Action = actDefiComplete
    end
  end
  object crsLatestReply: TClientRowSet
    Aggregates = <>
    AppServer = Dm.AppServer
    TableName = 'V_PROBLEM_LATEST_REPLY '
    Left = 208
    Top = 200
    object crsLatestReplyID: TStringField
      FieldName = 'ID'
      Size = 50
    end
    object crsLatestReplyPROBLEM_ID: TStringField
      FieldName = 'PROBLEM_ID'
      Size = 50
    end
    object crsLatestReplyPROCESS_DESC: TStringField
      FieldName = 'PROCESS_DESC'
      Size = 500
    end
    object crsLatestReplyNODE_NO: TStringField
      FieldName = 'NODE_NO'
      Size = 50
    end
    object crsLatestReplyPROCESS_NO: TStringField
      FieldName = 'PROCESS_NO'
      Size = 50
    end
    object crsLatestReplyPROCESS_NAME: TStringField
      FieldName = 'PROCESS_NAME'
      Size = 50
    end
    object crsLatestReplyCREATE_DT: TStringField
      FieldName = 'CREATE_DT'
    end
    object crsLatestReplyACCEPT_NODE: TStringField
      FieldName = 'ACCEPT_NODE'
      Size = 50
    end
    object crsLatestReplyGROUP_CODE: TStringField
      FieldName = 'GROUP_CODE'
      Size = 50
    end
    object crsLatestReplyCN: TFloatField
      FieldName = 'CN'
    end
    object crsLatestReplyNODE: TStringField
      FieldName = 'NODE'
      Size = 50
    end
  end
end
